home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1997 February / macformat-047.iso / Shareware Plus / Developers / DLOGManager 1.02 / Source Code / StandAlone.cp < prev    next >
Encoding:
Text File  |  1996-09-16  |  4.3 KB  |  203 lines  |  [TEXT/KAHL]
  1. /*** File: "StandAlone_v00.c"
  2. *
  3. *    Versione 00. Del 25-09-94.
  4. *    Scritto da Cadili Francesco.
  5. *
  6. *    Legge i dati relativi ad un film da DB.
  7. ************************************************/
  8. #include "StandAlone_v00.h"
  9. #include <Windows.h>
  10. #include <Dialogs.h>
  11. #include <Fonts.h>
  12. #include <TextEdit.h>
  13. #include <ToolUtils.h>
  14. #include <Resources.h>
  15. #include <Memory.h>
  16. #include <Menus.h>
  17. #include <Desk.h>
  18.  
  19. /******** Dichiarazioni private ************************/
  20. /******** Include Locali *******************************/
  21.  
  22. #include "StandAloneMenu_v00.h"
  23. #include "stringUtility_v02.h"
  24. #ifdef CONTROLLORISORSE
  25. #include "ControlloRisorse.h"
  26. #endif
  27. #pragma segment StandAlone
  28. /******** Fine Include Locali **************************/
  29. /******** Strutture dati locali ************************/
  30.  
  31. /********* Fine Strutture dati locali *******************/
  32. /******** Costanti locali ******************************/
  33.  
  34. #define ckkID 128
  35. WindowPtr frontmost;
  36. Cursor iBeam;
  37.  
  38. /******** Fine Costanti locali *************************/
  39. /******** Funzioni private: ****************************/
  40.  
  41. void InitMacintosh(void);
  42. int HandleMouseDown(EventRecord *theEvent);
  43. int HandleEvent(void);
  44. int checkForCode(void);
  45. void CantOpen(void);
  46.  
  47. /******** Fine Funzioni private ************************/
  48. /******** Fine Dichiarazioni private ********************/
  49.  
  50. /*** InitMacintosh()
  51. *
  52. *    Inizializza i manager e la memoria
  53. * 
  54. ****************************************/
  55. void InitMacintosh(void)
  56. {
  57.     MaxApplZone();
  58.     InitGraf(&qd.thePort);
  59.     InitFonts();
  60.     FlushEvents(everyEvent, 0);
  61.     InitWindows();
  62.     InitMenus();
  63.     TEInit();
  64.     InitDialogs(0L);
  65.     InitCursor();
  66. }
  67. /* end InitMacintosh */
  68.  
  69.  
  70. /*** HandleMouseDown(&theEvent)
  71. *
  72. *    Elabora un evento di tipo "mouse Down".
  73. *
  74. *    Par INPUT:    'theEvent' il descrittore dell'evento corrente.
  75. *    Val OUTPUT:    TRUE se deve proseguire nell'elaborazione
  76. *                FALSE se deve terminare.
  77. *
  78. *****************************************************************/
  79. int HandleMouseDown (EventRecord *theEvent)
  80. {
  81.     WindowPtr    theWindow;
  82.     int            windowCode = FindWindow(theEvent->where, &theWindow);
  83.     int            computeNext = true;
  84.  
  85.     switch (windowCode)
  86.     {
  87.         case inSysWindow: 
  88.             SystemClick (theEvent, theWindow);
  89.             break;
  90.         
  91.         case inMenuBar:
  92.             computeNext = HandleMenu(MenuSelect(theEvent->where));
  93.             break;
  94.     }
  95.     return(computeNext);
  96. }
  97. /* end HandleMouseDown */
  98.  
  99.  
  100. /*** HandleEvent()
  101. *
  102. *    Elabora un evento. (elabora solo un evento).
  103. *
  104. *    Val OUTPUT:    TRUE se deve proseguire nell'elaborazione
  105. *                FALSE se deve terminare.
  106. *
  107. ************************************************************/
  108. int HandleEvent(void)
  109. {
  110.     int            evento;
  111.     int            computeNext = true;
  112.     EventRecord    theEvent;
  113.  
  114.     HiliteMenu(0);
  115.     SystemTask ();            // permette l'elaborazione ai "desk accessory"
  116.  
  117.     evento = GetNextEvent (everyEvent, &theEvent);
  118.     if (evento)
  119.         switch (theEvent.what)
  120.         {
  121.             case mouseDown:
  122.                 computeNext = HandleMouseDown(&theEvent);
  123.                 break;
  124.  
  125.             case keyDown:
  126.             case autoKey:
  127.                 if ((theEvent.modifiers & cmdKey) != 0)
  128.                       computeNext = HandleMenu(MenuKey((char) (theEvent.message & charCodeMask)));
  129.                 break;
  130.         }
  131.     return(computeNext);
  132. }
  133. /* end HandleEvent */
  134.  
  135. /*** main()
  136. *
  137. ********************/
  138. void main(void)
  139. {
  140.     CursHandle    hCurs;
  141.  
  142.     InitMacintosh();
  143.     if (!checkForCode())
  144.     {
  145.         SysBeep(20);
  146.         CantOpen();
  147.         return;
  148.     }
  149.     SetUpMenus();
  150.  
  151.     hCurs = GetCursor(1);
  152. #ifdef CONTROLLORISORSE
  153.     CaricaRisorsa('CURS', 1);
  154. #endif
  155.     if (hCurs == NULL)
  156.         iBeam = qd.arrow;
  157.     else
  158.         iBeam = **hCurs;
  159.  
  160.     while(HandleEvent());
  161. }
  162. /* end main */
  163.  
  164. /*** checkForCode()
  165. *
  166. *    Controlla la presenza del codice di controllo.
  167. *
  168. *    Val OUTPUT: TRUE se รจ presente, FALSE altrimenti.
  169. *
  170. *****************************************************/
  171. int checkForCode(void)
  172. {
  173.     Handle chkHdl;
  174.  
  175. #ifdef CONTROLLORISORSE
  176.     CaricaRisorsa('chk?', ckkID);
  177. #endif
  178.     return(compareCHandleToPascal(GetResource('chk?', ckkID), "\pcode:10200"));
  179. }
  180. /* end checkForCode */
  181.  
  182. /*** CantOpen()
  183. *
  184. *    Errore nell'apertura del file delle risorse
  185. *
  186. *****************************************************/
  187. void CantOpen(void)
  188. {
  189.     Rect r;
  190.     WindowPtr window;
  191.  
  192.     SetRect(&r, 152, 60, 410, 132);
  193.     SetPort((window = NewWindow( (Ptr) 0L, &r, "\p", true, dBoxProc, (WindowPtr) -1L, false, 0L)));
  194.     TextFont(0);
  195.     MoveTo(4, 20);
  196.     DrawString("\pNon posso aprire il file delle risorse.");
  197.     MoveTo(4, 40);
  198.     DrawString("\pPremi il bottone del mouse per uscire.");
  199.     do {
  200.     } while (!Button());
  201. }
  202. /* end CantOpen */
  203.